home *** CD-ROM | disk | FTP | other *** search
-
- ; Either add this to your StartNet script, or execute it after connection.
- ;
- ; Change paths; Home: & Home:BufferedMail/ (if you have them different ;-)
- ; Also change (+0100) to your timezone! (line 13, col 87)
- ; And change C:PutMail (with arguments) to your mail-sender (line 10, col 100)
- ;
- ; Script done by Allan Odgaard <Duff@DK-Online.DK>
-
- C:List Home:BufferedMail/ LFormat "Search %p%n *"**NTo: *" NoNum*NEdit %p%n With T:DateStampMail*NC:PutMail Mail=%p%n Home=Home: NoAddr NoHead NoSig" To T:SendMail
- If `C:List T:SendMail LFormat %l` Not Eq "empty"
- Echo "Sending buffered mail... (`Rx "Say Left(Date('W'),3) || ',' Date() Time()"`)"
- Echo "F B U /Date:/*ND*NI*N`Rx "Say 'Date:' Left(Date('W'),3) || ',' Date() Time() '(+0100)'"`*NZ*NW" To T:DateStampMail
- C:Execute T:SendMail
- If Not Warn
- C:Delete >NIL: Home:BufferedMail/#? Quiet
- Echo " ...Done!*N"
- Else
- Echo " ...Failed!*N"
- EndIf
- C:Delete :T/EDIT-BACKUP Quiet
- EndIf
- C:Delete T:(DateStamp|Send)Mail Quiet
-
-